home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / program / misc / tri14dev.lha / Triton / Developer / DICE / regs.a < prev    next >
Text File  |  1995-08-25  |  528b  |  23 lines
  1. ; Dummy Functions to use the SAS/C getreg and putreg functions with DICE
  2. ; Attention, they're only reading/writing the a4 register, even if you
  3. ; specify a different one.
  4. ;
  5. ;   Written for the Triton Linklibs on 25-May-95 by Michael Bauer
  6. ;       (michael.bauer@zdv.uni-tuebingen.de)
  7. ;
  8.     section text,code
  9.     xdef ___builtin_getreg
  10.     xdef ___builtin_putreg
  11.  
  12. ___builtin_getreg
  13.     move.l  $0004(A7),D0
  14.     move.l  A4,D0
  15.     rts
  16.  
  17. ___builtin_putreg
  18.     move.l  $0004(a7),D0
  19.     move.l  $0008(a7),D1
  20.     move.l  D1,A4
  21.     rts
  22.  
  23.